inherited RelMensalPosto: TRelMensalPosto
  Top = 179
  HorzScrollBar.Range = 0
  VertScrollBar.Range = 0
  BorderStyle = bsDialog
  Caption = 'Mensal por Posto'
  ClientHeight = 499
  ClientWidth = 1154
  OldCreateOrder = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited rlRelatorio: TRLReport
    Margins.LeftMargin = 8.000000000000000000
    Margins.TopMargin = 8.000000000000000000
    Margins.RightMargin = 8.000000000000000000
    Margins.BottomMargin = 8.000000000000000000
    inherited grpGrupo: TRLGroup
      inherited RLBand2: TRLBand
        inherited dbLinha: TRLDBText
          DataField = 'MESANO'
        end
      end
    end
  end
  inherited qryConsulta: TADOQuery
    OnCalcFields = qryConsultaCalcFields
    SQL.Strings = (
      'EXEC SP_RELPOSTOMES :DATAINI, :DATAFIM')
    inherited qryConsultaDATA_VENDA: TDateTimeField
      FieldKind = fkCalculated
      Calculated = True
    end
    object qryConsultaMES: TIntegerField [21]
      FieldName = 'MES'
    end
    object qryConsultaANO: TIntegerField [22]
      FieldName = 'ANO'
    end
    object qryConsultaMESANO: TStringField [23]
      FieldKind = fkCalculated
      FieldName = 'MESANO'
      EditMask = 'AAA\/00;0; '
      Size = 5
      Calculated = True
    end
  end
end
